home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1987 February
/
Ahoy_Magazine_87-02_1987_Double_L.d64
/
Short Demo
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
213b
|
12 lines
100 (NULL)
110 (NULL)(10,10,6,12)
120 (NULL)(1,1,0,32,40,40)
130 a$="this is"+chr$(13)+"a test."
140 (NULL)(1,a$)
150 get t$:if t$<>" " then 150
160 (NULL)(3,2)
170 for i=1 to 4: (NULL)(i,2)
180 for j=1 to 20: next j: next i
190 get t$: if t$<>" " then 170
200 (NULL)(3)